package com.uam.common.aop;


import com.alibaba.fastjson.JSONObject;
import com.fasterxml.jackson.databind.ObjectMapper;
import com.uam.common.annotation.Log;
import com.uam.db.model.entity.SysOperLog;
import com.uam.db.model.entity.User;
import com.uam.web.common.model.Result;
import com.uam.web.common.utils.AsyncFactory;
import com.uam.web.common.utils.AsyncManager;
import com.uam.utils.IpUtils;
import com.uam.utils.StringUtils;
import com.uam.web.common.utils.WebUtil;
import com.uam.web.common.model.BusinessStatus;
import com.uam.web.common.model.BusinessType;
import com.uam.web.common.utils.ServletUtils;
import org.aspectj.lang.JoinPoint;
import org.aspectj.lang.annotation.AfterReturning;
import org.aspectj.lang.annotation.AfterThrowing;
import org.aspectj.lang.annotation.Aspect;
import org.aspectj.lang.annotation.Before;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.core.NamedThreadLocal;
import org.springframework.stereotype.Component;
import org.springframework.util.CollectionUtils;
import org.springframework.validation.BindingResult;
import org.springframework.web.multipart.MultipartFile;

import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;
import java.util.Collection;
import java.util.Map;

/**
 * 操作日志记录处理
 *
 * @author uam
 */
@Aspect
@Component
public class LogAspect {
    ObjectMapper objectMapper = new ObjectMapper();


    private static final Logger log = LoggerFactory.getLogger(LogAspect.class);

    /**
     * 排除敏感属性字段
     */
    public static final String QUERY_LOG = "queryLog";
    public static final String QUERY_LOG_FLAG = "1";

    /**
     * 计算操作消耗时间
     */
    private static final ThreadLocal<Long> TIME_THREADLOCAL = new NamedThreadLocal<Long>("Cost Time");

    /**
     * 处理请求前执行
     */
    @Before(value = "@annotation(controllerLog)")
    public void boBefore(JoinPoint joinPoint, Log controllerLog) {
//        if (saveLog(joinPoint, controllerLog)) {
        TIME_THREADLOCAL.set(System.currentTimeMillis());
//        }
    }

    public boolean saveLog(JoinPoint joinPoint, Log controllerLog) {
        boolean isSave = true;
        //查询日志单独处理
        if (controllerLog.businessType().name().equals(BusinessType.QUERY_LOG.name())) {
            Map<String, String[]> parameterMap = ServletUtils.getRequest().getParameterMap();
            String[] keys = controllerLog.includeSaveSelectLog().getKey();
            if (checkKeyExists(parameterMap, keys)) {
                return true;
            }
            for (int i = 0; i < joinPoint.getArgs().length; i++) {
                try {
                    isSave = false;
                    Object obj = joinPoint.getArgs()[i];
                    if (obj instanceof String || obj instanceof Number || obj instanceof Boolean || obj instanceof Character) {
                        continue;
                    } else {
                        // 也可以从HttpServletRequest 去取车url， 重菜单里配置查询 指定key
                        //ServletUtils.getRequest().getRequestURI();
                        Map<String, Object> map = objectMapper.convertValue(obj, Map.class);
                        if (checkKeyExists(map, keys)) {
                            return true;
                        }
                    }
                } catch (Exception e) {
                    isSave = false;
                    log.error("或取日志错误");
                }
            }
        }
        return isSave;
    }

    /**
     * 校验key是否存在
     */
    public boolean checkKeyExists(Map map, String[] keys) {
        if (CollectionUtils.isEmpty(map) || keys == null || keys.length == 0) {
            return false;
        }
        for (int i = 0; i < keys.length; i++) {
            Object value = map.get(keys[i]);
            if (value instanceof Collection) {
                if (!((Collection) value).isEmpty()) {
                    return true;
                }
            } else if (value instanceof Map) {
                if (!((Map) value).isEmpty()) {
                    return true;
                }
            } else if (value instanceof String) {
                if (!StringUtils.isEmpty((String) value)) {
                    return true;
                }
            } else if (value != null) {
                return true;
            }
        }
        return false;
    }

    /**
     * 处理完请求后执行
     *
     * @param joinPoint 切点
     */
    @AfterReturning(pointcut = "@annotation(controllerLog)", returning = "jsonResult")
    public void doAfterReturning(JoinPoint joinPoint, Log controllerLog, Object jsonResult) {
        handleLog(joinPoint, controllerLog, null, jsonResult);
    }

    /**
     * 拦截异常操作
     *
     * @param joinPoint 切点
     * @param e         异常
     */
    @AfterThrowing(value = "@annotation(controllerLog)", throwing = "e")
    public void doAfterThrowing(JoinPoint joinPoint, Log controllerLog, Exception e) {
        handleLog(joinPoint, controllerLog, e, null);
    }

    protected void handleLog(final JoinPoint joinPoint, Log controllerLog, final Exception e, Object jsonResult) {
        try {
//            Object threadLocal = TIME_THREADLOCAL.get();
//            if (threadLocal == null) {
//                TIME_THREADLOCAL.remove();
//                return;
//            }

            if (BusinessType.QUERY_LOG.equals(controllerLog.businessType())
                    && !QUERY_LOG_FLAG.equals(ServletUtils.getRequest().getHeader(QUERY_LOG))) {
                return;
            }

            // 获取当前的用户
            User currentUser = WebUtil.getTokenUser();

            // *========数据库日志=========*//
            SysOperLog operLog = new SysOperLog();
            operLog.setStatus(BusinessStatus.SUCCESS.ordinal());
            // 请求的地址
            String ip = IpUtils.getIpAddr(ServletUtils.getRequest());
            operLog.setOperIp(ip);
            operLog.setOperUrl(StringUtils.substring(ServletUtils.getRequest().getRequestURI(), 0, 255));
            if (currentUser != null) {
                operLog.setOperName(currentUser.getLoginName());
                operLog.setUserName(currentUser.getUserName());
//                if (StringUtils.isNotNull(currentUser.getDept())
//                        && StringUtils.isNotEmpty(currentUser.getDept().getDeptName())) {
//                    operLog.setDeptName(currentUser.getDept().getDeptName());
//                }
            }

            if (e != null) {
                operLog.setStatus(BusinessStatus.FAIL.ordinal());
                operLog.setErrorMsg(StringUtils.substring(e.getMessage(), 0, 2000));
            }
            // 设置方法名称
            String className = joinPoint.getTarget().getClass().getName();
            String methodName = joinPoint.getSignature().getName();
            operLog.setMethod(className + "." + methodName + "()");
            // 设置请求方式
            operLog.setRequestMethod(ServletUtils.getRequest().getMethod());
            // 处理设置注解上的参数
            getControllerMethodDescription(joinPoint, controllerLog, operLog, jsonResult);
            // 设置消耗时间
            operLog.setCostTime(System.currentTimeMillis() - TIME_THREADLOCAL.get());
            // 保存数据库
            AsyncManager.me().execute(AsyncFactory.recordOper(operLog));
        } catch (Exception exp) {
            // 记录本地异常日志
            log.error("异常信息:{}", exp.getMessage());
            exp.printStackTrace();
        } finally {
            TIME_THREADLOCAL.remove();
        }
    }

    /**
     * 获取注解中对方法的描述信息 用于Controller层注解
     *
     * @param log     日志
     * @param operLog 操作日志
     * @throws Exception
     */
    public void getControllerMethodDescription(JoinPoint joinPoint, Log log, SysOperLog operLog,
            Object jsonResult) throws Exception {
        // 设置action动作
        operLog.setBusinessType(log.businessType().ordinal());
        // 设置标题
        operLog.setTitle(log.title());
        // 设置操作人类别
        operLog.setOperatorType(log.operatorType().ordinal());
        // 是否需要保存request，参数和值
        if (log.isSaveRequestData()) {
            // 获取参数的信息，传入到数据库中。
            setRequestValue(joinPoint, operLog, log.excludeParamNames());
        }
        // 是否需要保存response，参数和值
        if (log.isSaveResponseData() && jsonResult != null) {
            operLog.setJsonResult(StringUtils.substring(JSONObject.toJSONString(jsonResult), 0, 2000));
        }
        if (jsonResult instanceof Result) {
            Result result = (Result) jsonResult;
            if (!result.isSuccess()) {
                operLog.setStatus(BusinessStatus.FAIL.ordinal());
                operLog.setErrorMsg(result.getMsg() != null ? result.getMsg() : "");
            }
        }
    }

    /**
     * 获取请求的参数，放到log中
     *
     * @param operLog 操作日志
     * @throws Exception 异常
     */
    private void setRequestValue(JoinPoint joinPoint, SysOperLog operLog, String[] excludeParamNames) throws Exception {
        Map<String, String[]> map = ServletUtils.getRequest().getParameterMap();
        if (StringUtils.isNotEmpty(map)) {
            String params = JSONObject.toJSONString(map);
            operLog.setOperParam(StringUtils.substring(params, 0, 2000));
        } else {
            Object args = joinPoint.getArgs();
            if (StringUtils.isNotNull(args)) {
                String params = argsArrayToString(joinPoint.getArgs(), excludeParamNames);
                operLog.setOperParam(StringUtils.substring(params, 0, 2000));
            }
        }
    }

    /**
     * 参数拼装
     */
    private String argsArrayToString(Object[] paramsArray, String[] excludeParamNames) {
        String params = "";
        if (paramsArray != null && paramsArray.length > 0) {
            for (Object o : paramsArray) {
                if (StringUtils.isNotNull(o) && !isFilterObject(o)) {
                    try {
                        Object jsonObj = JSONObject.toJSONString(o);
                        params += jsonObj.toString() + " ";
                    } catch (Exception e) {
                    }
                }
            }
        }
        return params.trim();
    }

    /**
     * 判断是否需要过滤的对象。
     *
     * @param o 对象信息。
     * @return 如果是需要过滤的对象，则返回true；否则返回false。
     */
    @SuppressWarnings("rawtypes")
    public boolean isFilterObject(final Object o) {
        Class<?> clazz = o.getClass();
        if (clazz.isArray()) {
            return clazz.getComponentType().isAssignableFrom(MultipartFile.class);
        } else if (Collection.class.isAssignableFrom(clazz)) {
            Collection collection = (Collection) o;
            for (Object value : collection) {
                return value instanceof MultipartFile;
            }
        } else if (Map.class.isAssignableFrom(clazz)) {
            Map map = (Map) o;
            for (Object value : map.entrySet()) {
                Map.Entry entry = (Map.Entry) value;
                return entry.getValue() instanceof MultipartFile;
            }
        }
        return o instanceof MultipartFile || o instanceof HttpServletRequest || o instanceof HttpServletResponse
                || o instanceof BindingResult;
    }
}
